home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1998-05-17 | 8.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 6c 84 01 2f 2f 3d 3d 3d |........|l..//===|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0d 0a 2f 2f 20 53 |========|==..// S|
|00000060| 65 72 76 65 72 55 70 6c | 69 6e 6b 3a 20 53 65 6e |erverUpl|ink: Sen|
|00000070| 64 73 20 74 69 6d 65 6c | 79 20 69 6e 66 6f 72 6d |ds timel|y inform|
|00000080| 61 74 69 6f 6e 20 74 6f | 20 74 68 65 20 4d 61 73 |ation to| the Mas|
|00000090| 74 65 72 20 53 65 72 76 | 65 72 20 62 61 73 65 64 |ter Serv|er based|
|000000a0| 20 6f 6e 20 74 68 65 0d | 0a 2f 2f 20 20 20 20 20 | on the.|.// |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 67 61 6d 65 20 69 | | game i|
|000000c0| 6e 20 70 72 6f 67 72 65 | 73 73 2e 0d 0a 2f 2f 3d |n progre|ss...//=|
|000000d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000100| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000110| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 0a 63 6c |========|====..cl|
|00000120| 61 73 73 20 53 65 72 76 | 65 72 55 70 6c 69 6e 6b |ass Serv|erUplink|
|00000130| 20 65 78 70 61 6e 64 73 | 20 54 63 70 4c 69 6e 6b | expands| TcpLink|
|00000140| 20 63 6f 6e 66 69 67 3b | 0d 0a 0d 0a 76 61 72 28 | config;|....var(|
|00000150| 29 20 63 6f 6e 66 69 67 | 20 62 6f 6f 6c 20 20 20 |) config| bool |
|00000160| 20 20 20 20 20 44 6f 55 | 70 6c 69 6e 6b 3b 09 09 | DoU|plink;..|
|00000170| 09 09 09 2f 2f 20 53 68 | 6f 75 6c 64 20 74 68 69 |...// Sh|ould thi|
|00000180| 73 20 64 65 64 69 63 61 | 74 65 64 20 73 65 72 76 |s dedica|ted serv|
|00000190| 65 72 20 74 65 6c 6c 20 | 74 68 65 20 6d 61 73 74 |er tell |the mast|
|000001a0| 65 72 20 73 65 72 76 65 | 72 3f 0d 0a 76 61 72 28 |er serve|r?..var(|
|000001b0| 29 20 63 6f 6e 66 69 67 | 20 73 74 72 69 6e 67 5b |) config| string[|
|000001c0| 32 35 35 5d 20 4d 61 73 | 74 65 72 53 65 72 76 65 |255] Mas|terServe|
|000001d0| 72 41 64 64 72 65 73 73 | 3b 09 09 2f 2f 20 54 68 |rAddress|;..// Th|
|000001e0| 65 20 64 6f 6d 61 69 6e | 2f 69 70 20 61 64 64 72 |e domain|/ip addr|
|000001f0| 65 73 73 20 6f 66 20 74 | 68 65 20 6d 61 73 74 65 |ess of t|he maste|
|00000200| 72 20 73 65 72 76 65 72 | 0d 0a 76 61 72 28 29 20 |r server|..var() |
|00000210| 63 6f 6e 66 69 67 20 73 | 74 72 69 6e 67 5b 32 35 |config s|tring[25|
|00000220| 35 5d 20 43 6f 6d 6d 65 | 6e 74 53 74 72 69 6e 67 |5] Comme|ntString|
|00000230| 3b 09 09 09 09 2f 2f 20 | 53 48 4f 52 54 21 21 21 |;....// |SHORT!!!|
|00000240| 20 43 6f 6d 6d 65 6e 74 | 20 61 62 6f 75 74 20 74 | Comment| about t|
|00000250| 68 65 20 67 61 6d 65 0d | 0a 76 61 72 28 29 20 63 |he game.|.var() c|
|00000260| 6f 6e 66 69 67 20 69 6e | 74 20 09 09 20 47 61 6d |onfig in|t .. Gam|
|00000270| 65 50 6f 72 74 3b 20 20 | 09 09 09 09 2f 2f 20 57 |ePort; |....// W|
|00000280| 68 61 74 20 69 73 20 74 | 68 65 20 64 65 66 61 75 |hat is t|he defau|
|00000290| 6c 74 20 67 61 6d 65 70 | 6f 72 74 3f 0d 0a 0d 0a |lt gamep|ort?....|
|000002a0| 76 61 72 20 73 74 72 69 | 6e 67 5b 32 35 35 5d 20 |var stri|ng[255] |
|000002b0| 49 6e 66 6f 72 6d 61 74 | 69 6f 6e 53 74 72 69 6e |Informat|ionStrin|
|000002c0| 67 3b 09 09 09 09 09 2f | 2f 20 42 61 73 69 63 20 |g;...../|/ Basic |
|000002d0| 73 65 72 76 65 72 20 64 | 61 74 61 20 2b 20 7b 2a |server d|ata + {*|
|000002e0| 0d 0a 76 61 72 20 73 74 | 72 69 6e 67 5b 31 36 5d |..var st|ring[16]|
|000002f0| 20 20 43 6f 6d 6d 65 6e | 74 45 6e 64 3b 09 09 09 | Commen|tEnd;...|
|00000300| 09 09 09 09 2f 2f 20 42 | 61 73 69 63 61 6c 6c 79 |....// B|asically|
|00000310| 20 2a 0d 0a 76 61 72 20 | 73 74 72 69 6e 67 5b 32 | *..var |string[2|
|00000320| 35 35 5d 20 50 65 72 50 | 6c 61 79 65 72 44 61 74 |55] PerP|layerDat|
|00000330| 61 3b 09 09 09 09 09 09 | 2f 2f 20 43 6f 6e 74 61 |a;......|// Conta|
|00000340| 69 6e 73 20 74 68 65 20 | 69 6e 66 6f 72 6d 61 74 |ins the |informat|
|00000350| 69 6f 6e 20 66 6f 72 20 | 6f 6e 65 20 70 6c 61 79 |ion for |one play|
|00000360| 65 72 0d 0a 76 61 72 20 | 73 74 72 69 6e 67 5b 31 |er..var |string[1|
|00000370| 36 5d 09 45 6e 64 69 6e | 67 53 74 72 69 6e 67 3b |6].Endin|gString;|
|00000380| 09 09 09 09 09 09 2f 2f | 20 42 61 73 69 63 61 6c |......//| Basical|
|00000390| 6c 79 20 7d 0d 0a 0d 0a | 76 61 72 20 73 74 72 69 |ly }....|var stri|
|000003a0| 6e 67 5b 32 35 35 5d 20 | 54 68 69 73 4d 61 63 68 |ng[255] |ThisMach|
|000003b0| 69 6e 65 73 55 52 4c 3b | 0d 0a 76 61 72 20 73 74 |inesURL;|..var st|
|000003c0| 72 69 6e 67 5b 31 36 5d | 20 20 53 65 72 76 65 72 |ring[16]| Server|
|000003d0| 56 65 72 73 69 6f 6e 3b | 0d 0a 76 61 72 20 73 74 |Version;|..var st|
|000003e0| 72 69 6e 67 5b 31 36 5d | 20 20 47 61 6d 65 54 79 |ring[16]| GameTy|
|000003f0| 70 65 53 74 72 69 6e 67 | 3b 0d 0a 76 61 72 20 73 |peString|;..var s|
|00000400| 74 72 69 6e 67 5b 36 34 | 5d 20 20 4c 65 76 65 6c |tring[64|] Level|
|00000410| 46 69 6c 65 4e 61 6d 65 | 3b 0d 0a 76 61 72 20 73 |FileName|;..var s|
|00000420| 74 72 69 6e 67 5b 32 35 | 35 5d 20 54 65 6d 70 53 |tring[25|5] TempS|
|00000430| 74 72 3b 0d 0a 0d 0a 76 | 61 72 20 70 6c 61 79 65 |tr;....v|ar playe|
|00000440| 72 70 61 77 6e 20 09 55 | 50 6c 61 79 65 72 3b 0d |rpawn .U|Player;.|
|00000450| 0a 76 61 72 20 70 6c 61 | 79 65 72 70 61 77 6e 09 |.var pla|yerpawn.|
|00000460| 55 50 6c 61 79 65 72 4c | 69 73 74 5b 36 34 5d 3b |UPlayerL|ist[64];|
|00000470| 0d 0a 76 61 72 20 69 6e | 74 20 20 20 20 20 20 20 |..var in|t |
|00000480| 20 20 49 6e 66 6f 4e 75 | 6d 3b 20 20 20 20 20 0d | InfoNu|m; .|
|00000490| 0a 76 61 72 20 69 6e 74 | 20 20 20 20 20 20 20 20 |.var int| |
|000004a0| 20 50 6c 61 79 65 72 4e | 75 6d 3b 0d 0a 76 61 72 | PlayerN|um;..var|
|000004b0| 20 69 6e 74 20 20 20 20 | 20 20 20 20 20 4e 75 6d | int | Num|
|000004c0| 50 6c 61 79 65 72 73 3b | 0d 0a 76 61 72 20 62 6f |Players;|..var bo|
|000004d0| 6f 6c 09 09 4d 61 6b 65 | 50 6c 61 79 65 72 53 74 |ol..Make|PlayerSt|
|000004e0| 72 69 6e 67 3b 0d 0a 0d | 0a 76 61 72 20 69 6e 74 |ring;...|.var int|
|000004f0| 20 55 70 64 61 74 65 50 | 65 72 69 6f 64 3b 20 20 | UpdateP|eriod; |
|00000500| 09 09 09 2f 2f 31 35 2a | 36 30 0d 0a 0d 0a 76 61 |...//15*|60....va|
|00000510| 72 20 69 6e 74 20 4d 61 | 73 74 65 72 50 6f 72 74 |r int Ma|sterPort|
|00000520| 3b 09 09 09 09 2f 2f 3d | 34 31 33 35 37 0d 0a 76 |;....//=|41357..v|
|00000530| 61 72 20 69 6e 74 20 56 | 65 72 69 66 79 50 6f 72 |ar int V|erifyPor|
|00000540| 74 3b 09 09 09 09 2f 2f | 3d 34 31 33 35 39 0d 0a |t;....//|=41359..|
|00000550| 76 61 72 20 69 6e 74 20 | 51 75 65 72 79 50 6f 72 |var int |QueryPor|
|00000560| 74 3b 09 09 09 09 2f 2f | 47 61 6d 65 70 6f 72 74 |t;....//|Gameport|
|00000570| 2b 31 30 30 30 0d 0a 0d | 0a 76 61 72 20 66 6c 6f |+1000...|.var flo|
|00000580| 61 74 20 54 69 6d 65 50 | 61 73 73 65 64 3b 0d 0a |at TimeP|assed;..|
|00000590| 76 61 72 20 69 6e 74 20 | 20 20 41 6d 74 53 65 6e |var int | AmtSen|
|000005a0| 74 3b 0d 0a 0d 0a 76 61 | 72 20 53 65 72 76 65 72 |t;....va|r Server|
|000005b0| 56 65 72 69 66 79 20 53 | 56 65 72 69 66 79 3b 09 |Verify S|Verify;.|
|000005c0| 09 2f 2f 20 52 65 66 65 | 72 65 6e 63 65 73 20 74 |.// Refe|rences t|
|000005d0| 6f 20 74 68 65 20 6e 65 | 63 65 73 73 61 72 79 20 |o the ne|cessary |
|000005e0| 68 65 6c 70 65 72 20 73 | 63 72 69 70 74 73 0d 0a |helper s|cripts..|
|000005f0| 76 61 72 20 53 65 72 76 | 65 72 51 75 65 72 79 20 |var Serv|erQuery |
|00000600| 20 53 51 75 65 72 79 3b | 0d 0a 0d 0a 0d 0a 2f 2f | SQuery;|......//|
|00000610| 0d 0a 2f 2f 20 54 61 6b | 65 20 6f 75 74 20 61 6e |..// Tak|e out an|
|00000620| 79 20 2a 20 73 69 67 6e | 73 20 61 6e 64 20 72 65 |y * sign|s and re|
|00000630| 70 6c 61 63 65 20 77 69 | 74 68 20 2b 0d 0a 2f 2f |place wi|th +..//|
|00000640| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 50 72 75 6e 65 |..functi|on Prune|
|00000650| 43 6f 6d 6d 65 6e 74 53 | 74 72 69 6e 67 28 29 0d |CommentS|tring().|
|00000660| 0a 7b 0d 0a 09 6c 6f 63 | 61 6c 20 62 6f 6f 6c 20 |.{...loc|al bool |
|00000670| 66 69 6e 3b 0d 0a 09 6c | 6f 63 61 6c 20 69 6e 74 |fin;...l|ocal int|
|00000680| 20 20 69 6e 64 65 78 2c | 20 69 6e 64 65 78 32 3b | index,| index2;|
|00000690| 0d 0a 0d 0a 09 66 69 6e | 3d 66 61 6c 73 65 3b 0d |.....fin|=false;.|
|000006a0| 0a 09 77 68 69 6c 65 28 | 21 66 69 6e 29 0d 0a 09 |..while(|!fin)...|
|000006b0| 7b 0d 0a 09 09 69 6e 64 | 65 78 20 3d 20 49 6e 53 |{....ind|ex = InS|
|000006c0| 74 72 28 20 43 6f 6d 6d | 65 6e 74 53 74 72 69 6e |tr( Comm|entStrin|
|000006d0| 67 2c 20 22 2a 22 20 29 | 3b 0d 0a 09 09 69 66 28 |g, "*" )|;....if(|
|000006e0| 20 69 6e 64 65 78 20 21 | 3d 20 2d 31 20 29 0d 0a | index !|= -1 )..|
|000006f0| 09 09 7b 0d 0a 09 09 09 | 2f 2f 20 52 65 70 6c 61 |..{.....|// Repla|
|00000700| 63 65 0d 0a 09 09 09 69 | 6e 64 65 78 32 20 3d 20 |ce.....i|ndex2 = |
|00000710| 4c 65 6e 28 20 43 6f 6d | 6d 65 6e 74 53 74 72 69 |Len( Com|mentStri|
|00000720| 6e 67 20 29 3b 0d 0a 09 | 09 09 69 66 28 20 69 6e |ng );...|..if( in|
|00000730| 64 65 78 2b 31 20 3c 20 | 69 6e 64 65 78 32 20 29 |dex+1 < |index2 )|
|00000740| 0d 0a 09 09 09 7b 0d 0a | 09 09 09 09 2f 2f 20 4e |.....{..|....// N|
|00000750| 6f 74 20 74 68 65 20 6c | 61 73 74 20 63 68 61 72 |ot the l|ast char|
|00000760| 61 63 74 65 72 20 69 6e | 20 74 68 65 20 73 74 72 |acter in| the str|
|00000770| 69 6e 67 0d 0a 09 09 09 | 09 43 6f 6d 6d 65 6e 74 |ing.....|.Comment|
|00000780| 53 74 72 69 6e 67 20 3d | 20 4c 65 66 74 28 20 43 |String =| Left( C|
|00000790| 6f 6d 6d 65 6e 74 53 74 | 72 69 6e 67 2c 20 69 6e |ommentSt|ring, in|
|000007a0| 64 65 78 20 29 20 24 20 | 22 2b 22 20 24 0d 0a 09 |dex ) $ |"+" $...|
|000007b0| 09 09 09 09 09 09 09 52 | 69 67 68 74 28 20 43 6f |.......R|ight( Co|
|000007c0| 6d 6d 65 6e 74 53 74 72 | 69 6e 67 2c 20 69 6e 64 |mmentStr|ing, ind|
|000007d0| 65 78 32 2d 69 6e 64 65 | 78 2d 31 20 29 3b 0d 0a |ex2-inde|x-1 );..|
|000007e0| 09 09 09 7d 0d 0a 09 09 | 09 65 6c 73 65 0d 0a 09 |...}....|.else...|
|000007f0| 09 09 7b 0d 0a 09 09 09 | 09 2f 2f 20 49 74 27 73 |..{.....|.// It's|
|00000800| 20 74 68 65 20 6c 61 73 | 74 20 63 68 61 72 61 63 | the las|t charac|
|00000810| 74 65 72 20 69 6e 20 74 | 68 65 20 73 74 72 69 6e |ter in t|he strin|
|00000820| 67 0d 0a 09 09 09 09 43 | 6f 6d 6d 65 6e 74 53 74 |g......C|ommentSt|
|00000830| 72 69 6e 67 20 3d 20 4c | 65 66 74 28 20 43 6f 6d |ring = L|eft( Com|
|00000840| 6d 65 6e 74 53 74 72 69 | 6e 67 2c 20 69 6e 64 65 |mentStri|ng, inde|
|00000850| 78 20 29 20 24 20 22 2b | 22 3b 0d 0a 09 09 09 09 |x ) $ "+|";......|
|00000860| 66 69 6e 3d 74 72 75 65 | 3b 0d 0a 09 09 09 7d 0d |fin=true|;.....}.|
|00000870| 0a 09 09 09 0d 0a 09 09 | 7d 0d 0a 09 09 65 6c 73 |........|}....els|
|00000880| 65 20 66 69 6e 3d 74 72 | 75 65 3b 0d 0a 09 7d 0d |e fin=tr|ue;...}.|
|00000890| 0a 7d 0d 0a 0d 0a 2f 2f | 0d 0a 2f 2f 20 43 72 65 |.}....//|..// Cre|
|000008a0| 61 74 65 73 20 74 68 65 | 20 62 61 73 69 63 20 73 |ates the| basic s|
|000008b0| 65 72 76 65 72 20 69 6e | 66 6f 72 6d 61 74 69 6f |erver in|formatio|
|000008c0| 6e 20 73 74 72 69 6e 67 | 0d 0a 2f 2f 0d 0a 66 75 |n string|..//..fu|
|000008d0| 6e 63 74 69 6f 6e 20 4d | 61 6b 65 49 6e 66 6f 72 |nction M|akeInfor|
|000008e0| 6d 61 74 69 6f 6e 53 74 | 72 69 6e 67 28 29 0d 0a |mationSt|ring()..|
|000008f0| 7b 0d 0a 09 4c 65 76 65 | 6c 46 69 6c 65 4e 61 6d |{...Leve|lFileNam|
|00000900| 65 09 3d 20 53 74 72 69 | 6e 67 28 4c 65 76 65 6c |e.= Stri|ng(Level|
|00000910| 2e 50 61 72 65 6e 74 2e | 4e 61 6d 65 29 3b 0d 0a |.Parent.|Name);..|
|00000920| 0d 0a 09 2f 2f 20 48 6f | 77 20 6d 61 6e 79 20 70 |...// Ho|w many p|
|00000930| 6c 61 79 65 72 73 20 65 | 78 69 73 74 20 69 6e 20 |layers e|xist in |
|00000940| 74 68 65 20 67 61 6d 65 | 3f 0d 0a 09 4e 75 6d 50 |the game|?...NumP|
|00000950| 6c 61 79 65 72 73 3d 30 | 3b 0d 0a 09 66 6f 72 65 |layers=0|;...fore|
|00000960| 61 63 68 20 41 6c 6c 41 | 63 74 6f 72 73 28 20 63 |ach AllA|ctors( c|
|00000970| 6c 61 73 73 20 27 70 6c | 61 79 65 72 70 61 77 6e |lass 'pl|ayerpawn|
|00000980| 27 2c 20 55 50 6c 61 79 | 65 72 20 29 20 7b 0d 0a |', UPlay|er ) {..|
|00000990| 09 09 4e 75 6d 50 6c 61 | 79 65 72 73 2b 2b 3b 0d |..NumPla|yers++;.|
|000009a0| 0a 09 7d 0d 0a 0d 0a 09 | 2f 2f 20 46 69 6e 64 20 |..}.....|// Find |
|000009b0| 6f 75 74 20 77 68 61 74 | 20 6b 69 6e 64 20 6f 66 |out what| kind of|
|000009c0| 20 67 61 6d 65 20 69 73 | 20 72 75 6e 6e 69 6e 67 | game is| running|
|000009d0| 0d 0a 09 47 61 6d 65 54 | 79 70 65 53 74 72 69 6e |...GameT|ypeStrin|
|000009e0| 67 20 3d 20 73 74 72 69 | 6e 67 28 4c 65 76 65 6c |g = stri|ng(Level|
|000009f0| 2e 47 61 6d 65 2e 43 6c | 61 73 73 2e 4e 61 6d 65 |.Game.Cl|ass.Name|
|00000a00| 29 3b 20 2f 2f 20 74 68 | 69 73 20 77 61 79 2c 20 |); // th|is way, |
|00000a10| 74 68 65 20 67 61 6d 65 | 20 63 6c 61 73 73 20 6e |the game| class n|
|00000a20| 61 6d 65 20 69 73 20 6e | 6f 74 20 68 61 72 64 63 |ame is n|ot hardc|
|00000a30| 6f 64 65 64 20 2d 54 69 | 6d 0d 0a 0d 0a 09 2f 2f |oded -Ti|m.....//|
|00000a40| 20 57 72 69 74 65 20 74 | 68 65 20 6d 61 69 6e 20 | Write t|he main |
|00000a50| 64 61 74 61 20 68 65 61 | 64 65 72 0d 0a 09 49 6e |data hea|der...In|
|00000a60| 66 6f 72 6d 61 74 69 6f | 6e 53 74 72 69 6e 67 20 |formatio|nString |
|00000a70| 3d 20 54 68 69 73 4d 61 | 63 68 69 6e 65 73 55 52 |= ThisMa|chinesUR|
|00000a80| 4c 20 24 20 22 20 22 20 | 24 20 53 65 72 76 65 72 |L $ " " |$ Server|
|00000a90| 56 65 72 73 69 6f 6e 20 | 20 24 20 22 20 22 20 24 |Version | $ " " $|
|00000aa0| 20 0d 0a 09 09 09 09 09 | 09 4e 75 6d 50 6c 61 79 | .......|.NumPlay|
|00000ab0| 65 72 73 20 20 20 20 20 | 20 24 20 22 20 22 20 24 |ers | $ " " $|
|00000ac0| 20 47 61 6d 65 54 79 70 | 65 53 74 72 69 6e 67 20 | GameTyp|eString |
|00000ad0| 24 20 22 20 22 20 24 20 | 0d 0a 09 09 09 09 09 09 |$ " " $ |........|
|00000ae0| 4c 65 76 65 6c 46 69 6c | 65 4e 61 6d 65 20 20 20 |LevelFil|eName |
|00000af0| 24 20 22 20 22 20 24 20 | 47 61 6d 65 50 6f 72 74 |$ " " $ |GamePort|
|00000b00| 20 20 20 20 20 20 20 24 | 20 22 20 22 20 24 20 0d | $| " " $ .|
|00000b10| 0a 09 09 09 09 09 09 51 | 75 65 72 79 50 6f 72 74 |.......Q|ueryPort|
|00000b20| 20 20 20 20 20 20 20 24 | 20 22 20 7b 20 2a 22 3b | $| " { *";|
|00000b30| 0d 0a 7d 0d 0a 0d 0a 0d | 0a 2f 2f 0d 0a 2f 2f 20 |..}.....|.//..// |
|00000b40| 44 6f 20 74 68 65 20 6d | 61 69 6e 20 69 6e 69 74 |Do the m|ain init|
|00000b50| 69 61 6c 69 7a 61 74 69 | 6f 6e 0d 0a 2f 2f 0d 0a |ializati|on..//..|
|00000b60| 66 75 6e 63 74 69 6f 6e | 20 42 65 67 69 6e 50 6c |function| BeginPl|
|00000b70| 61 79 28 29 0d 0a 7b 0d | 0a 09 6c 6f 63 61 6c 20 |ay()..{.|..local |
|00000b80| 69 6e 74 20 69 6e 64 65 | 78 31 2c 20 69 6e 64 65 |int inde|x1, inde|
|00000b90| 78 32 3b 0d 0a 09 6c 6f | 63 61 6c 20 73 74 72 69 |x2;...lo|cal stri|
|00000ba0| 6e 67 5b 32 34 30 5d 20 | 54 65 6d 70 55 52 4c 3b |ng[240] |TempURL;|
|00000bb0| 0d 0a 0d 0a 09 69 66 28 | 20 21 44 6f 55 70 6c 69 |.....if(| !DoUpli|
|00000bc0| 6e 6b 20 29 0d 0a 09 7b | 0d 0a 09 09 44 65 73 74 |nk )...{|....Dest|
|00000bd0| 72 6f 79 28 29 3b 0d 0a | 09 09 72 65 74 75 72 6e |roy();..|..return|
|00000be0| 3b 0d 0a 09 7d 0d 0a 0d | 0a 09 55 70 64 61 74 65 |;...}...|..Update|
|00000bf0| 50 65 72 69 6f 64 20 3d | 20 31 35 2a 36 30 3b 09 |Period =| 15*60;.|
|00000c00| 09 2f 2f 20 65 76 65 72 | 79 20 31 35 20 6d 69 6e |.// ever|y 15 min|
|00000c10| 75 74 65 73 0d 0a 0d 0a | 09 2f 2f 20 50 61 72 73 |utes....|.// Pars|
|00000c20| 65 20 4c 65 76 65 6c 2e | 47 65 74 41 64 64 72 65 |e Level.|GetAddre|
|00000c30| 73 73 55 52 4c 28 29 20 | 66 6f 72 20 49 50 20 61 |ssURL() |for IP a|
|00000c40| 64 64 72 65 73 73 20 61 | 6e 64 20 70 6f 72 74 20 |ddress a|nd port |
|00000c50| 6e 75 6d 62 65 72 0d 0a | 09 2f 2f 20 46 6f 72 6d |number..|.// Form|
|00000c60| 61 74 3a 20 49 70 2e 41 | 64 64 72 65 73 73 2e 63 |at: Ip.A|ddress.c|
|00000c70| 6f 6d 3a 50 6f 72 74 4e | 75 6d 2f 4c 65 76 65 6c |om:PortN|um/Level|
|00000c80| 4e 61 6d 65 20 69 66 20 | 74 68 65 20 70 6f 72 74 |Name if |the port|
|00000c90| 20 69 73 6e 27 74 20 74 | 68 65 0d 0a 09 2f 2f 20 | isn't t|he...// |
|00000ca0| 64 65 66 61 75 6c 74 2e | 20 20 4f 74 68 65 72 77 |default.| Otherw|
|00000cb0| 69 73 65 2c 20 69 74 73 | 0d 0a 09 2f 2f 20 09 09 |ise, its|...// ..|
|00000cc0| 20 20 20 49 70 2e 41 64 | 64 72 65 73 73 2e 63 6f | Ip.Ad|dress.co|
|00000cd0| 6d 2f 4c 65 76 65 6c 4e | 61 6d 65 0d 0a 0d 0a 09 |m/LevelN|ame.....|
|00000ce0| 54 65 6d 70 53 74 72 20 | 3d 20 4c 65 76 65 6c 2e |TempStr |= Level.|
|00000cf0| 47 65 74 41 64 64 72 65 | 73 73 55 52 4c 28 29 3b |GetAddre|ssURL();|
|00000d00| 0d 0a 09 69 6e 64 65 78 | 32 20 3d 20 49 6e 53 74 |...index|2 = InSt|
|00000d10| 72 28 20 54 65 6d 70 53 | 74 72 2c 20 22 3a 22 20 |r( TempS|tr, ":" |
|00000d20| 20 29 3b 09 09 09 2f 2f | 20 45 6e 64 20 62 6f 75 | );...//| End bou|
|00000d30| 6e 64 20 66 6f 72 20 49 | 70 41 64 64 72 65 73 73 |nd for I|pAddress|
|00000d40| 09 0d 0a 0d 0a 09 69 66 | 28 20 69 6e 64 65 78 32 |......if|( index2|
|00000d50| 20 3e 20 30 20 29 0d 0a | 09 7b 0d 0a 09 09 2f 2f | > 0 )..|.{....//|
|00000d60| 20 46 6f 72 6d 61 74 20 | 77 69 74 68 20 70 6f 72 | Format |with por|
|00000d70| 74 20 69 6e 63 6c 75 64 | 65 64 0d 0a 09 09 54 68 |t includ|ed....Th|
|00000d80| 69 73 4d 61 63 68 69 6e | 65 73 55 52 4c 20 3d 20 |isMachin|esURL = |
|00000d90| 4d 69 64 28 20 54 65 6d | 70 53 74 72 2c 20 30 2c |Mid( Tem|pStr, 0,|
|00000da0| 20 69 6e 64 65 78 32 20 | 29 3b 0d 0a 09 09 54 65 | index2 |);....Te|
|00000db0| 6d 70 53 74 72 20 3d 20 | 4d 69 64 28 20 54 65 6d |mpStr = |Mid( Tem|
|00000dc0| 70 53 74 72 2c 20 69 6e | 64 65 78 32 2b 31 20 29 |pStr, in|dex2+1 )|
|00000dd0| 3b 09 09 09 2f 2f 20 47 | 65 74 20 74 68 65 20 73 |;...// G|et the s|
|00000de0| 75 62 73 74 72 69 6e 67 | 20 73 74 61 72 74 69 6e |ubstring| startin|
|00000df0| 67 20 61 74 20 50 6f 72 | 74 20 6e 75 6d 62 65 72 |g at Por|t number|
|00000e00| 0d 0a 09 09 69 6e 64 65 | 78 32 20 3d 20 49 6e 53 |....inde|x2 = InS|
|00000e10| 74 72 28 20 54 65 6d 70 | 53 74 72 2c 20 22 2f 22 |tr( Temp|Str, "/"|
|00000e20| 20 29 3b 09 09 09 09 2f | 2f 20 45 6e 64 20 62 6f | );..../|/ End bo|
|00000e30| 75 6e 64 20 66 6f 72 20 | 50 6f 72 74 20 6e 75 6d |und for |Port num|
|00000e40| 62 65 72 0d 0a 09 09 69 | 66 28 20 69 6e 64 65 78 |ber....i|f( index|
|00000e50| 32 20 3e 20 30 20 29 0d | 0a 09 09 09 47 61 6d 65 |2 > 0 ).|....Game|
|00000e60| 50 6f 72 74 20 3d 20 49 | 6e 74 28 20 4d 69 64 28 |Port = I|nt( Mid(|
|00000e70| 20 54 65 6d 70 53 74 72 | 2c 20 30 2c 20 69 6e 64 | TempStr|, 0, ind|
|00000e80| 65 78 32 20 29 20 29 3b | 0d 0a 09 09 2f 2f 20 6f |ex2 ) );|....// o|
|00000e90| 74 68 65 72 77 69 73 65 | 20 61 73 73 75 6d 65 20 |therwise| assume |
|00000ea0| 74 68 65 20 69 6e 74 69 | 61 6c 69 7a 65 64 20 64 |the inti|alized d|
|00000eb0| 65 66 61 75 6c 74 2c 20 | 37 37 37 37 0d 0a 09 7d |efault, |7777...}|
|00000ec0| 0d 0a 09 65 6c 73 65 0d | 0a 09 7b 0d 0a 09 09 2f |...else.|..{..../|
|00000ed0| 2f 20 46 6f 72 6d 61 74 | 20 77 69 74 68 20 70 6f |/ Format| with po|
|00000ee0| 72 74 20 65 78 63 6c 75 | 64 65 64 0d 0a 09 09 69 |rt exclu|ded....i|
|00000ef0| 6e 64 65 78 32 20 3d 20 | 49 6e 53 74 72 28 20 54 |ndex2 = |InStr( T|
|00000f00| 65 6d 70 53 74 72 2c 20 | 22 2f 22 20 29 3b 09 09 |empStr, |"/" );..|
|00000f10| 09 2f 2f 20 45 6e 64 20 | 62 6f 75 6e 64 20 66 6f |.// End |bound fo|
|00000f20| 72 20 49 70 41 64 64 72 | 65 73 73 0d 0a 09 09 54 |r IpAddr|ess....T|
|00000f30| 68 69 73 4d 61 63 68 69 | 6e 65 73 55 52 4c 20 3d |hisMachi|nesURL =|
|00000f40| 20 4d 69 64 28 20 54 65 | 6d 70 53 74 72 2c 20 30 | Mid( Te|mpStr, 0|
|00000f50| 2c 20 69 6e 64 65 78 32 | 20 29 3b 0d 0a 09 09 2f |, index2| );..../|
|00000f60| 2f 20 47 61 6d 65 50 6f | 72 74 20 77 69 6c 6c 20 |/ GamePo|rt will |
|00000f70| 73 74 61 79 20 77 69 74 | 68 20 74 68 65 20 69 6e |stay wit|h the in|
|00000f80| 69 74 69 61 6c 69 7a 65 | 64 20 64 65 66 61 75 6c |itialize|d defaul|
|00000f90| 74 2c 20 37 37 37 37 0d | 0a 09 7d 0d 0a 0d 0a 09 |t, 7777.|..}.....|
|00000fa0| 2f 2f 20 45 6e 73 75 72 | 65 20 74 68 61 74 20 74 |// Ensur|e that t|
|00000fb0| 68 65 20 4d 61 73 74 65 | 72 20 73 65 72 76 65 72 |he Maste|r server|
|00000fc0| 20 61 64 64 72 65 73 73 | 20 69 73 20 69 6e 20 49 | address| is in I|
|00000fd0| 50 20 61 64 64 72 65 73 | 73 20 66 6f 72 6d 0d 0a |P addres|s form..|
|00000fe0| 09 69 66 28 20 47 65 74 | 49 70 42 79 4e 61 6d 65 |.if( Get|IpByName|
|00000ff0| 28 20 4d 61 73 74 65 72 | 53 65 72 76 65 72 41 64 |( Master|ServerAd|
|00001000| 64 72 65 73 73 2c 20 54 | 65 6d 70 55 52 4c 20 29 |dress, T|empURL )|
|00001010| 20 3d 3d 20 31 20 29 0d | 0a 09 7b 0d 0a 09 09 2f | == 1 ).|..{..../|
|00001020| 2f 20 53 75 63 63 65 73 | 73 0d 0a 09 09 4d 61 73 |/ Succes|s....Mas|
|00001030| 74 65 72 53 65 72 76 65 | 72 41 64 64 72 65 73 73 |terServe|rAddress|
|00001040| 20 3d 20 54 65 6d 70 55 | 52 4c 3b 0d 0a 09 7d 0d | = TempU|RL;...}.|
|00001050| 0a 09 09 0d 0a 09 51 75 | 65 72 79 50 6f 72 74 20 |......Qu|eryPort |
|00001060| 20 20 20 3d 20 47 61 6d | 65 50 6f 72 74 20 2b 20 | = Gam|ePort + |
|00001070| 31 30 30 30 3b 0d 0a 09 | 4d 61 73 74 65 72 50 6f |1000;...|MasterPo|
|00001080| 72 74 20 20 20 3d 20 34 | 31 33 35 37 3b 0d 0a 09 |rt = 4|1357;...|
|00001090| 56 65 72 69 66 79 50 6f | 72 74 20 20 20 3d 20 34 |VerifyPo|rt = 4|
|000010a0| 31 33 35 39 3b 0d 0a 0d | 0a 0d 0a 09 53 65 72 76 |1359;...|....Serv|
|000010b0| 65 72 56 65 72 73 69 6f | 6e 20 3d 20 4c 65 76 65 |erVersio|n = Leve|
|000010c0| 6c 2e 45 6e 67 69 6e 65 | 56 65 72 73 69 6f 6e 3b |l.Engine|Version;|
|000010d0| 0d 0a 09 50 72 75 6e 65 | 43 6f 6d 6d 65 6e 74 53 |...Prune|CommentS|
|000010e0| 74 72 69 6e 67 28 29 3b | 0d 0a 09 43 6f 6d 6d 65 |tring();|...Comme|
|000010f0| 6e 74 45 6e 64 20 3d 20 | 22 2a 20 22 3b 0d 0a 09 |ntEnd = |"* ";...|
|00001100| 45 6e 64 69 6e 67 53 74 | 72 69 6e 67 20 3d 20 22 |EndingSt|ring = "|
|00001110| 20 7d 20 22 3b 0d 0a 7d | 0d 0a 0d 0a 2f 2f 0d 0a | } ";..}|....//..|
|00001120| 2f 2f 20 53 74 6f 72 65 | 73 20 61 6c 6c 20 74 68 |// Store|s all th|
|00001130| 65 20 70 6c 61 79 65 72 | 20 72 65 66 65 72 65 6e |e player| referen|
|00001140| 63 65 73 20 69 6e 20 61 | 6e 20 61 72 72 61 79 2c |ces in a|n array,|
|00001150| 20 73 6f 20 74 68 61 74 | 20 74 68 65 79 20 63 61 | so that| they ca|
|00001160| 6e 20 62 65 20 63 79 63 | 6c 65 64 20 74 68 72 6f |n be cyc|led thro|
|00001170| 75 67 68 20 69 6e 20 54 | 69 63 6b 2e 0d 0a 2f 2f |ugh in T|ick...//|
|00001180| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 47 65 74 50 6c |..functi|on GetPl|
|00001190| 61 79 65 72 52 65 66 65 | 72 65 6e 63 65 73 28 29 |ayerRefe|rences()|
|000011a0| 0d 0a 7b 0d 0a 09 6c 6f | 63 61 6c 20 69 6e 74 20 |..{...lo|cal int |
|000011b0| 69 3b 0d 0a 09 69 3d 30 | 3b 0d 0a 09 66 6f 72 65 |i;...i=0|;...fore|
|000011c0| 61 63 68 20 41 6c 6c 41 | 63 74 6f 72 73 28 20 63 |ach AllA|ctors( c|
|000011d0| 6c 61 73 73 20 27 70 6c | 61 79 65 72 70 61 77 6e |lass 'pl|ayerpawn|
|000011e0| 27 2c 20 55 50 6c 61 79 | 65 72 20 29 0d 0a 09 7b |', UPlay|er )...{|
|000011f0| 0d 0a 09 09 55 50 6c 61 | 79 65 72 4c 69 73 74 5b |....UPla|yerList[|
|00001200| 69 5d 20 3d 20 55 50 6c | 61 79 65 72 3b 0d 0a 09 |i] = UPl|ayer;...|
|00001210| 09 69 2b 2b 3b 0d 0a 09 | 7d 0d 0a 7d 0d 0a 0d 0a |.i++;...|}..}....|
|00001220| 0d 0a 2f 2f 0d 0a 2f 2f | 20 57 61 6b 65 73 20 75 |..//..//| Wakes u|
|00001230| 70 20 65 76 65 72 79 20 | 66 65 77 20 6d 69 6e 75 |p every |few minu|
|00001240| 74 65 73 20 74 6f 20 73 | 65 6e 64 20 73 6f 6d 65 |tes to s|end some|
|00001250| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 74 6f 20 | informa|tion to |
|00001260| 74 68 65 20 4d 61 73 74 | 65 72 20 73 65 72 76 65 |the Mast|er serve|
|00001270| 72 2e 0d 0a 2f 2f 0d 0a | 66 75 6e 63 74 69 6f 6e |r...//..|function|
|00001280| 20 54 69 6d 65 72 28 29 | 0d 0a 7b 0d 0a 09 44 69 | Timer()|..{...Di|
|00001290| 73 61 62 6c 65 28 27 54 | 69 6d 65 72 27 29 3b 0d |sable('T|imer');.|
|000012a0| 0a 09 54 69 6d 65 50 61 | 73 73 65 64 3d 30 3b 0d |..TimePa|ssed=0;.|
|000012b0| 0a 09 41 6d 74 53 65 6e | 74 3d 30 3b 0d 0a 09 47 |..AmtSen|t=0;...G|
|000012c0| 6f 74 6f 53 74 61 74 65 | 28 27 54 72 79 54 6f 43 |otoState|('TryToC|
|000012d0| 6f 6e 6e 65 63 74 27 29 | 3b 0d 0a 7d 0d 0a 0d 0a |onnect')|;..}....|
|000012e0| 0d 0a 2f 2f 0d 0a 2f 2f | 20 2d 2d 2d 2d 2d 2d 2d |..//..//| -------|
|000012f0| 20 53 74 61 74 65 73 20 | 2d 2d 2d 2d 2d 2d 2d 0d | States |-------.|
|00001300| 0a 2f 2f 0d 0a 0d 0a 61 | 75 74 6f 20 73 74 61 74 |.//....a|uto stat|
|00001310| 65 20 49 6e 69 74 69 61 | 6c 0d 0a 7b 0d 0a 42 65 |e Initia|l..{..Be|
|00001320| 67 69 6e 3a 0d 0a 09 44 | 69 73 61 62 6c 65 28 27 |gin:...D|isable('|
|00001330| 54 69 63 6b 27 29 3b 0d | 0a 09 53 65 74 54 69 6d |Tick');.|..SetTim|
|00001340| 65 72 28 33 30 2c 20 66 | 61 6c 73 65 29 3b 09 2f |er(30, f|alse);./|
|00001350| 2f 20 57 61 69 74 20 33 | 30 20 73 65 63 6f 6e 64 |/ Wait 3|0 second|
|00001360| 73 20 66 6f 72 20 75 6e | 72 65 61 6c 20 74 6f 20 |s for un|real to |
|00001370| 66 69 6e 69 73 68 20 74 | 68 72 61 73 68 69 6e 67 |finish t|hrashing|
|00001380| 0d 0a 09 53 51 75 65 72 | 79 20 20 3d 20 53 70 61 |...SQuer|y = Spa|
|00001390| 77 6e 28 20 43 6c 61 73 | 73 20 27 53 65 72 76 65 |wn( Clas|s 'Serve|
|000013a0| 72 51 75 65 72 79 27 20 | 20 29 3b 0d 0a 09 09 53 |rQuery' | );....S|
|000013b0| 51 75 65 72 79 2e 51 75 | 65 72 79 50 6f 72 74 20 |Query.Qu|eryPort |
|000013c0| 3d 20 51 75 65 72 79 50 | 6f 72 74 3b 0d 0a 09 53 |= QueryP|ort;...S|
|000013d0| 56 65 72 69 66 79 20 3d | 20 53 70 61 77 6e 28 20 |Verify =| Spawn( |
|000013e0| 43 6c 61 73 73 20 27 53 | 65 72 76 65 72 56 65 72 |Class 'S|erverVer|
|000013f0| 69 66 79 27 20 29 3b 0d | 0a 09 09 53 56 65 72 69 |ify' );.|...SVeri|
|00001400| 66 79 2e 56 65 72 69 66 | 79 50 6f 72 74 20 3d 20 |fy.Verif|yPort = |
|00001410| 56 65 72 69 66 79 50 6f | 72 74 3b 0d 0a 7d 0d 0a |VerifyPo|rt;..}..|
|00001420| 0d 0a 73 74 61 74 65 20 | 57 61 69 74 50 65 72 69 |..state |WaitPeri|
|00001430| 6f 64 0d 0a 7b 0d 0a 42 | 65 67 69 6e 3a 0d 0a 09 |od..{..B|egin:...|
|00001440| 2f 2f 20 53 65 74 20 69 | 74 20 74 6f 20 77 61 6b |// Set i|t to wak|
|00001450| 65 20 75 70 20 61 6e 64 | 20 72 65 2d 73 65 6e 64 |e up and| re-send|
|00001460| 20 64 61 74 61 0d 0a 09 | 45 6e 61 62 6c 65 28 27 | data...|Enable('|
|00001470| 54 69 6d 65 72 27 29 3b | 0d 0a 09 53 65 74 54 69 |Timer');|...SetTi|
|00001480| 6d 65 72 28 55 70 64 61 | 74 65 50 65 72 69 6f 64 |mer(Upda|tePeriod|
|00001490| 2c 20 66 61 6c 73 65 29 | 3b 0d 0a 7d 0d 0a 0d 0a |, false)|;..}....|
|000014a0| 73 74 61 74 65 20 54 72 | 79 54 6f 43 6f 6e 6e 65 |state Tr|yToConne|
|000014b0| 63 74 0d 0a 7b 0d 0a 09 | 66 75 6e 63 74 69 6f 6e |ct..{...|function|
|000014c0| 20 54 69 63 6b 28 20 66 | 6c 6f 61 74 20 44 65 6c | Tick( f|loat Del|
|000014d0| 74 61 54 69 6d 65 20 29 | 0d 0a 09 7b 0d 0a 09 09 |taTime )|...{....|
|000014e0| 2f 2f 20 4f 70 65 6e 20 | 61 20 63 6f 6e 6e 65 63 |// Open |a connec|
|000014f0| 74 69 6f 6e 20 74 6f 20 | 74 68 65 20 6d 61 73 74 |tion to |the mast|
|00001500| 65 72 20 73 65 72 76 65 | 72 0d 0a 09 09 4f 70 65 |er serve|r....Ope|
|00001510| 6e 28 20 4d 61 73 74 65 | 72 53 65 72 76 65 72 41 |n( Maste|rServerA|
|00001520| 64 64 72 65 73 73 2c 20 | 4d 61 73 74 65 72 50 6f |ddress, |MasterPo|
|00001530| 72 74 20 29 3b 0d 0a 09 | 09 69 66 28 20 4c 69 6e |rt );...|.if( Lin|
|00001540| 6b 53 74 61 74 65 20 3d | 3d 20 54 43 50 5f 4f 70 |kState =|= TCP_Op|
|00001550| 65 6e 20 29 0d 0a 09 09 | 7b 0d 0a 09 09 09 09 47 |en )....|{......G|
|00001560| 6f 74 6f 53 74 61 74 65 | 28 27 53 65 6e 64 44 61 |otoState|('SendDa|
|00001570| 74 61 27 29 3b 0d 0a 09 | 09 7d 0d 0a 09 09 54 69 |ta');...|.}....Ti|
|00001580| 6d 65 50 61 73 73 65 64 | 2b 3d 44 65 6c 74 61 54 |mePassed|+=DeltaT|
|00001590| 69 6d 65 3b 0d 0a 09 09 | 69 66 28 20 54 69 6d 65 |ime;....|if( Time|
|000015a0| 50 61 73 73 65 64 20 3e | 3d 20 55 70 64 61 74 65 |Passed >|= Update|
|000015b0| 50 65 72 69 6f 64 20 29 | 0d 0a 09 09 7b 0d 0a 09 |Period )|....{...|
|000015c0| 09 09 2f 2f 20 45 72 72 | 6f 72 2c 20 63 6f 75 6c |..// Err|or, coul|
|000015d0| 64 20 6e 6f 74 20 63 6f | 6e 6e 65 63 74 20 74 6f |d not co|nnect to|
|000015e0| 20 6d 61 73 74 65 72 20 | 73 65 72 76 65 72 0d 0a | master |server..|
|000015f0| 09 09 09 6c 6f 67 28 22 | 53 65 72 76 65 72 55 70 |...log("|ServerUp|
|00001600| 6c 69 6e 6b 3a 20 43 72 | 69 74 69 63 61 6c 2c 20 |link: Cr|itical, |
|00001610| 63 61 6e 6e 6f 74 20 65 | 73 74 61 62 6c 69 73 68 |cannot e|stablish|
|00001620| 20 6c 69 6e 6b 20 74 6f | 20 6d 61 73 74 65 72 20 | link to| master |
|00001630| 73 65 72 76 65 72 2e 20 | 20 47 61 6d 65 20 77 69 |server. | Game wi|
|00001640| 6c 6c 20 6e 6f 74 20 62 | 65 20 76 69 73 69 62 6c |ll not b|e visibl|
|00001650| 65 2e 22 29 3b 0d 0a 09 | 09 09 44 69 73 61 62 6c |e.");...|..Disabl|
|00001660| 65 28 27 54 69 63 6b 27 | 29 3b 0d 0a 09 09 09 64 |e('Tick'|);.....d|
|00001670| 65 73 74 72 6f 79 28 29 | 3b 0d 0a 09 09 7d 0d 0a |estroy()|;....}..|
|00001680| 09 7d 0d 0a 0d 0a 42 65 | 67 69 6e 3a 0d 0a 09 2f |.}....Be|gin:.../|
|00001690| 2f 6c 6f 67 28 22 43 6f | 6e 6e 65 63 74 69 6e 67 |/log("Co|nnecting|
|000016a0| 20 74 6f 20 22 20 24 20 | 4d 61 73 74 65 72 53 65 | to " $ |MasterSe|
|000016b0| 72 76 65 72 41 64 64 72 | 65 73 73 20 24 20 22 20 |rverAddr|ess $ " |
|000016c0| 6f 76 65 72 20 70 6f 72 | 74 20 22 20 24 20 4d 61 |over por|t " $ Ma|
|000016d0| 73 74 65 72 50 6f 72 74 | 29 3b 0d 0a 09 45 6e 61 |sterPort|);...Ena|
|000016e0| 62 6c 65 28 27 54 69 63 | 6b 27 29 3b 0d 0a 7d 0d |ble('Tic|k');..}.|
|000016f0| 0a 0d 0a 73 74 61 74 65 | 20 57 61 69 74 57 68 69 |...state| WaitWhi|
|00001700| 6c 65 43 6c 6f 73 69 6e | 67 0d 0a 7b 0d 0a 09 66 |leClosin|g..{...f|
|00001710| 75 6e 63 74 69 6f 6e 20 | 54 69 6d 65 72 28 29 0d |unction |Timer().|
|00001720| 0a 09 7b 0d 0a 09 09 44 | 69 73 61 62 6c 65 28 27 |..{....D|isable('|
|00001730| 54 69 6d 65 72 27 29 3b | 0d 0a 09 09 43 6c 6f 73 |Timer');|....Clos|
|00001740| 65 28 29 3b 09 09 0d 0a | 09 09 45 6e 61 62 6c 65 |e();....|..Enable|
|00001750| 28 27 54 69 63 6b 27 29 | 3b 0d 0a 09 09 47 6f 74 |('Tick')|;....Got|
|00001760| 6f 53 74 61 74 65 28 27 | 57 61 69 74 50 65 72 69 |oState('|WaitPeri|
|00001770| 6f 64 27 29 3b 0d 0a 09 | 7d 0d 0a 0d 0a 42 65 67 |od');...|}....Beg|
|00001780| 69 6e 3a 0d 0a 09 2f 2f | 20 54 68 69 73 20 77 61 |in:...//| This wa|
|00001790| 69 74 20 69 73 20 6e 65 | 63 65 73 73 61 72 79 20 |it is ne|cessary |
|000017a0| 6f 74 68 65 72 77 69 73 | 65 20 74 68 65 20 63 6c |otherwis|e the cl|
|000017b0| 6f 73 65 28 29 20 63 6f | 6d 6d 61 6e 64 20 77 69 |ose() co|mmand wi|
|000017c0| 6c 6c 0d 0a 09 2f 2f 20 | 64 65 73 74 72 6f 79 20 |ll...// |destroy |
|000017d0| 74 68 65 20 71 75 65 75 | 65 64 20 64 61 74 61 20 |the queu|ed data |
|000017e0| 74 68 61 74 20 77 61 73 | 20 73 65 6e 74 2e 0d 0a |that was| sent...|
|000017f0| 09 2f 2f 6c 6f 67 28 22 | 43 6c 6f 73 69 6e 67 2e |.//log("|Closing.|
|00001800| 22 29 3b 0d 0a 09 44 69 | 73 61 62 6c 65 28 27 54 |");...Di|sable('T|
|00001810| 69 63 6b 27 29 3b 0d 0a | 09 53 65 74 54 69 6d 65 |ick');..|.SetTime|
|00001820| 72 28 36 2c 66 61 6c 73 | 65 29 3b 0d 0a 7d 0d 0a |r(6,fals|e);..}..|
|00001830| 0d 0a 73 74 61 74 65 20 | 53 65 6e 64 44 61 74 61 |..state |SendData|
|00001840| 0d 0a 7b 0d 0a 09 66 75 | 6e 63 74 69 6f 6e 20 54 |..{...fu|nction T|
|00001850| 69 63 6b 28 20 66 6c 6f | 61 74 20 64 65 6c 74 61 |ick( flo|at delta|
|00001860| 54 69 6d 65 20 29 0d 0a | 09 7b 0d 0a 09 09 73 77 |Time )..|.{....sw|
|00001870| 69 74 63 68 28 20 49 6e | 66 6f 4e 75 6d 20 29 0d |itch( In|foNum ).|
|00001880| 0a 09 09 7b 0d 0a 09 09 | 09 63 61 73 65 20 30 3a |...{....|.case 0:|
|00001890| 09 09 2f 2f 20 42 61 73 | 69 63 20 49 6e 66 6f 72 |..// Bas|ic Infor|
|000018a0| 6d 61 74 69 6f 6e 0d 0a | 09 09 09 09 2f 2f 6c 6f |mation..|....//lo|
|000018b0| 67 28 22 42 61 73 69 63 | 20 49 6e 66 6f 72 6d 61 |g("Basic| Informa|
|000018c0| 74 69 6f 6e 22 29 3b 0d | 0a 09 09 09 09 41 6d 74 |tion");.|.....Amt|
|000018d0| 53 65 6e 74 20 2b 3d 20 | 53 65 6e 64 54 65 78 74 |Sent += |SendText|
|000018e0| 28 20 49 6e 66 6f 72 6d | 61 74 69 6f 6e 53 74 72 |( Inform|ationStr|
|000018f0| 69 6e 67 2c 20 41 6d 74 | 53 65 6e 74 20 29 3b 0d |ing, Amt|Sent );.|
|00001900| 0a 09 09 09 09 69 66 28 | 20 41 6d 74 53 65 6e 74 |.....if(| AmtSent|
|00001910| 20 3e 3d 20 4c 65 6e 28 | 20 49 6e 66 6f 72 6d 61 | >= Len(| Informa|
|00001920| 74 69 6f 6e 53 74 72 69 | 6e 67 20 29 20 29 0d 0a |tionStri|ng ) )..|
|00001930| 09 09 09 09 7b 0d 0a 09 | 09 09 09 09 41 6d 74 53 |....{...|....AmtS|
|00001940| 65 6e 74 3d 30 3b 0d 0a | 09 09 09 09 09 49 6e 66 |ent=0;..|.....Inf|
|00001950| 6f 4e 75 6d 2b 2b 3b 0d | 0a 09 09 09 09 7d 0d 0a |oNum++;.|.....}..|
|00001960| 09 09 09 09 62 72 65 61 | 6b 3b 0d 0a 09 09 09 09 |....brea|k;......|
|00001970| 0d 0a 09 09 09 63 61 73 | 65 20 31 3a 09 09 2f 2f |.....cas|e 1:..//|
|00001980| 20 43 6f 6d 6d 65 6e 74 | 20 53 74 72 69 6e 67 0d | Comment| String.|
|00001990| 0a 09 09 09 09 2f 2f 6c | 6f 67 28 22 43 6f 6d 6d |.....//l|og("Comm|
|000019a0| 65 6e 74 20 53 74 72 69 | 6e 67 22 29 3b 0d 0a 09 |ent Stri|ng");...|
|000019b0| 09 09 09 41 6d 74 53 65 | 6e 74 20 2b 3d 20 53 65 |...AmtSe|nt += Se|
|000019c0| 6e 64 54 65 78 74 28 20 | 43 6f 6d 6d 65 6e 74 53 |ndText( |CommentS|
|000019d0| 74 72 69 6e 67 2c 20 41 | 6d 74 53 65 6e 74 20 29 |tring, A|mtSent )|
|000019e0| 3b 0d 0a 09 09 09 09 69 | 66 28 20 41 6d 74 53 65 |;......i|f( AmtSe|
|000019f0| 6e 74 20 3e 3d 20 4c 65 | 6e 28 20 43 6f 6d 6d 65 |nt >= Le|n( Comme|
|00001a00| 6e 74 53 74 72 69 6e 67 | 20 29 20 29 0d 0a 09 09 |ntString| ) )....|
|00001a10| 09 09 7b 0d 0a 09 09 09 | 09 09 41 6d 74 53 65 6e |..{.....|..AmtSen|
|00001a20| 74 3d 30 3b 0d 0a 09 09 | 09 09 09 49 6e 66 6f 4e |t=0;....|...InfoN|
|00001a30| 75 6d 2b 2b 3b 0d 0a 09 | 09 09 09 7d 0d 0a 09 09 |um++;...|...}....|
|00001a40| 09 09 62 72 65 61 6b 3b | 0d 0a 09 09 09 0d 0a 09 |..break;|........|
|00001a50| 09 09 63 61 73 65 20 32 | 3a 20 09 2f 2f 20 43 6f |..case 2|: .// Co|
|00001a60| 6d 6d 65 6e 74 20 45 6e | 64 69 6e 67 0d 0a 09 09 |mment En|ding....|
|00001a70| 09 09 2f 2f 6c 6f 67 28 | 22 43 6f 6d 6d 65 6e 74 |..//log(|"Comment|
|00001a80| 20 45 6e 64 69 6e 67 22 | 29 3b 0d 0a 09 09 09 09 | Ending"|);......|
|00001a90| 41 6d 74 53 65 6e 74 20 | 2b 3d 20 53 65 6e 64 54 |AmtSent |+= SendT|
|00001aa0| 65 78 74 28 20 43 6f 6d | 6d 65 6e 74 45 6e 64 2c |ext( Com|mentEnd,|
|00001ab0| 20 41 6d 74 53 65 6e 74 | 20 29 3b 0d 0a 09 09 09 | AmtSent| );.....|
|00001ac0| 09 69 66 28 20 41 6d 74 | 53 65 6e 74 20 3e 3d 20 |.if( Amt|Sent >= |
|00001ad0| 4c 65 6e 28 20 43 6f 6d | 6d 65 6e 74 45 6e 64 20 |Len( Com|mentEnd |
|00001ae0| 29 20 29 0d 0a 09 09 09 | 09 7b 0d 0a 09 09 09 09 |) ).....|.{......|
|00001af0| 09 41 6d 74 53 65 6e 74 | 3d 30 3b 0d 0a 09 09 09 |.AmtSent|=0;.....|
|00001b00| 09 09 49 6e 66 6f 4e 75 | 6d 2b 2b 3b 0d 0a 09 09 |..InfoNu|m++;....|
|00001b10| 09 09 7d 0d 0a 09 09 09 | 09 62 72 65 61 6b 3b 0d |..}.....|.break;.|
|00001b20| 0a 09 09 09 0d 0a 09 09 | 09 63 61 73 65 20 33 3a |........|.case 3:|
|00001b30| 20 09 2f 2f 20 45 61 63 | 68 20 70 6c 61 79 65 72 | .// Eac|h player|
|00001b40| 20 69 6e 64 69 76 69 64 | 75 61 6c 6c 79 0d 0a 09 | individ|ually...|
|00001b50| 09 09 09 2f 2f 6c 6f 67 | 28 22 45 61 63 68 20 70 |...//log|("Each p|
|00001b60| 6c 61 79 65 72 20 69 6e | 64 69 76 69 64 75 61 6c |layer in|dividual|
|00001b70| 6c 79 22 29 3b 0d 0a 09 | 09 09 09 69 66 28 20 4e |ly");...|...if( N|
|00001b80| 75 6d 50 6c 61 79 65 72 | 73 20 3e 20 30 20 29 0d |umPlayer|s > 0 ).|
|00001b90| 0a 09 09 09 09 7b 0d 0a | 09 09 09 09 09 2f 2f 20 |.....{..|.....// |
|00001ba0| 53 68 6f 75 6c 64 20 61 | 20 6e 65 77 20 70 6c 61 |Should a| new pla|
|00001bb0| 79 65 72 20 73 74 72 69 | 6e 67 20 62 65 20 63 72 |yer stri|ng be cr|
|00001bc0| 65 61 74 65 64 3f 0d 0a | 09 09 09 09 09 69 66 28 |eated?..|.....if(|
|00001bd0| 20 4d 61 6b 65 50 6c 61 | 79 65 72 53 74 72 69 6e | MakePla|yerStrin|
|00001be0| 67 20 29 0d 0a 09 09 09 | 09 09 7b 0d 0a 09 09 09 |g ).....|..{.....|
|00001bf0| 09 09 09 50 65 72 50 6c | 61 79 65 72 44 61 74 61 |...PerPl|ayerData|
|00001c00| 20 3d 20 55 50 6c 61 79 | 65 72 4c 69 73 74 5b 50 | = UPlay|erList[P|
|00001c10| 6c 61 79 65 72 4e 75 6d | 5d 2e 50 6c 61 79 65 72 |layerNum|].Player|
|00001c20| 4e 61 6d 65 20 24 20 22 | 20 22 20 24 0d 0a 09 09 |Name $ "| " $....|
|00001c30| 09 09 09 09 09 09 09 09 | 55 50 6c 61 79 65 72 4c |........|UPlayerL|
|00001c40| 69 73 74 5b 50 6c 61 79 | 65 72 4e 75 6d 5d 2e 53 |ist[Play|erNum].S|
|00001c50| 6b 69 6e 20 24 20 22 20 | 22 20 24 0d 0a 09 09 09 |kin $ " |" $.....|
|00001c60| 09 09 09 09 09 09 09 55 | 50 6c 61 79 65 72 4c 69 |.......U|PlayerLi|
|00001c70| 73 74 5b 50 6c 61 79 65 | 72 4e 75 6d 5d 2e 4b 69 |st[Playe|rNum].Ki|
|00001c80| 6c 6c 43 6f 75 6e 74 20 | 24 20 22 20 22 20 24 0d |llCount |$ " " $.|
|00001c90| 0a 09 09 09 09 09 09 09 | 09 09 09 55 50 6c 61 79 |........|...UPlay|
|00001ca0| 65 72 4c 69 73 74 5b 50 | 6c 61 79 65 72 4e 75 6d |erList[P|layerNum|
|00001cb0| 5d 2e 44 69 65 43 6f 75 | 6e 74 20 24 20 22 20 22 |].DieCou|nt $ " "|
|00001cc0| 20 24 0d 0a 09 09 09 09 | 09 09 09 09 09 09 55 50 | $......|......UP|
|00001cd0| 6c 61 79 65 72 4c 69 73 | 74 5b 50 6c 61 79 65 72 |layerLis|t[Player|
|00001ce0| 4e 75 6d 5d 2e 54 65 61 | 6d 20 24 20 22 20 22 3b |Num].Tea|m $ " ";|
|00001cf0| 0d 0a 09 09 09 09 09 09 | 41 6d 74 53 65 6e 74 3d |........|AmtSent=|
|00001d00| 30 3b 0d 0a 09 09 09 09 | 09 09 4d 61 6b 65 50 6c |0;......|..MakePl|
|00001d10| 61 79 65 72 53 74 72 69 | 6e 67 3d 66 61 6c 73 65 |ayerStri|ng=false|
|00001d20| 3b 0d 0a 09 09 09 09 09 | 7d 09 09 09 09 0d 0a 09 |;.......|}.......|
|00001d30| 09 09 09 0d 0a 09 09 09 | 09 09 41 6d 74 53 65 6e |........|..AmtSen|
|00001d40| 74 20 2b 3d 20 53 65 6e | 64 54 65 78 74 28 20 50 |t += Sen|dText( P|
|00001d50| 65 72 50 6c 61 79 65 72 | 44 61 74 61 2c 20 41 6d |erPlayer|Data, Am|
|00001d60| 74 53 65 6e 74 20 29 3b | 0d 0a 09 09 09 09 09 69 |tSent );|.......i|
|00001d70| 66 28 20 41 6d 74 53 65 | 6e 74 20 3e 3d 20 4c 65 |f( AmtSe|nt >= Le|
|00001d80| 6e 28 20 50 65 72 50 6c | 61 79 65 72 44 61 74 61 |n( PerPl|ayerData|
|00001d90| 20 29 20 29 0d 0a 09 09 | 09 09 09 7b 0d 0a 09 09 | ) )....|...{....|
|00001da0| 09 09 09 09 4d 61 6b 65 | 50 6c 61 79 65 72 53 74 |....Make|PlayerSt|
|00001db0| 72 69 6e 67 3d 74 72 75 | 65 3b 0d 0a 09 09 09 09 |ring=tru|e;......|
|00001dc0| 09 09 50 6c 61 79 65 72 | 4e 75 6d 2b 2b 3b 0d 0a |..Player|Num++;..|
|00001dd0| 09 09 09 09 09 09 69 66 | 28 20 50 6c 61 79 65 72 |......if|( Player|
|00001de0| 4e 75 6d 20 3e 3d 20 4e | 75 6d 50 6c 61 79 65 72 |Num >= N|umPlayer|
|00001df0| 73 20 29 0d 0a 09 09 09 | 09 09 09 7b 0d 0a 09 09 |s ).....|...{....|
|00001e00| 09 09 09 09 09 49 6e 66 | 6f 4e 75 6d 2b 2b 3b 0d |.....Inf|oNum++;.|
|00001e10| 0a 09 09 09 09 09 09 7d | 0d 0a 09 09 09 09 09 7d |.......}|.......}|
|00001e20| 0d 0a 09 09 09 09 7d 0d | 0a 09 09 09 09 65 6c 73 |......}.|.....els|
|00001e30| 65 20 49 6e 66 6f 4e 75 | 6d 2b 2b 3b 0d 0a 09 09 |e InfoNu|m++;....|
|00001e40| 09 09 62 72 65 61 6b 3b | 0d 0a 09 09 0d 0a 09 09 |..break;|........|
|00001e50| 09 64 65 66 61 75 6c 74 | 3a 09 2f 2f 20 45 6e 64 |.default|:.// End|
|00001e60| 69 6e 67 0d 0a 09 09 09 | 09 2f 2f 6c 6f 67 28 22 |ing.....|.//log("|
|00001e70| 45 6e 64 69 6e 67 22 29 | 3b 0d 0a 09 09 09 09 41 |Ending")|;......A|
|00001e80| 6d 74 53 65 6e 74 20 2b | 3d 20 53 65 6e 64 54 65 |mtSent +|= SendTe|
|00001e90| 78 74 28 20 45 6e 64 69 | 6e 67 53 74 72 69 6e 67 |xt( Endi|ngString|
|00001ea0| 2c 20 41 6d 74 53 65 6e | 74 20 29 3b 0d 0a 09 09 |, AmtSen|t );....|
|00001eb0| 09 09 69 66 28 20 41 6d | 74 53 65 6e 74 20 3e 3d |..if( Am|tSent >=|
|00001ec0| 20 4c 65 6e 28 20 45 6e | 64 69 6e 67 53 74 72 69 | Len( En|dingStri|
|00001ed0| 6e 67 20 29 20 29 0d 0a | 09 09 09 09 7b 0d 0a 09 |ng ) )..|....{...|
|00001ee0| 09 09 09 09 41 6d 74 53 | 65 6e 74 3d 30 3b 0d 0a |....AmtS|ent=0;..|
|00001ef0| 09 09 09 09 09 47 6f 74 | 6f 53 74 61 74 65 28 27 |.....Got|oState('|
|00001f00| 57 61 69 74 57 68 69 6c | 65 43 6c 6f 73 69 6e 67 |WaitWhil|eClosing|
|00001f10| 27 29 3b 0d 0a 09 09 09 | 09 7d 0d 0a 09 09 7d 0d |');.....|.}....}.|
|00001f20| 0a 0d 0a 09 09 54 69 6d | 65 50 61 73 73 65 64 20 |.....Tim|ePassed |
|00001f30| 2b 3d 20 64 65 6c 74 61 | 54 69 6d 65 3b 0d 0a 09 |+= delta|Time;...|
|00001f40| 09 69 66 28 20 54 69 6d | 65 50 61 73 73 65 64 20 |.if( Tim|ePassed |
|00001f50| 3e 3d 20 55 70 64 61 74 | 65 50 65 72 69 6f 64 20 |>= Updat|ePeriod |
|00001f60| 29 0d 0a 09 09 7b 0d 0a | 09 09 09 2f 2f 20 43 6f |)....{..|...// Co|
|00001f70| 6e 73 69 64 65 72 65 64 | 20 75 6e 73 75 63 63 65 |nsidered| unsucce|
|00001f80| 73 73 66 75 6c 2c 20 6e | 6f 74 20 66 69 6e 69 73 |ssful, n|ot finis|
|00001f90| 68 65 64 20 73 65 6e 64 | 69 6e 67 20 61 66 74 65 |hed send|ing afte|
|00001fa0| 72 20 61 6c 6c 20 74 68 | 69 73 20 74 69 6d 65 2e |r all th|is time.|
|00001fb0| 0d 0a 09 09 09 2f 2f 20 | 43 6c 6f 73 65 20 74 68 |.....// |Close th|
|00001fc0| 65 20 63 6f 6e 6e 65 63 | 74 69 6f 6e 2c 20 74 72 |e connec|tion, tr|
|00001fd0| 79 20 61 67 61 69 6e 20 | 69 6d 6d 65 64 69 61 74 |y again |immediat|
|00001fe0| 65 6c 79 0d 0a 09 09 09 | 43 6c 6f 73 65 28 29 3b |ely.....|Close();|
|00001ff0| 0d 0a 09 09 09 47 6f 74 | 6f 53 74 61 74 65 28 27 |.....Got|oState('|
|00002000| 54 72 79 54 6f 43 6f 6e | 6e 65 63 74 27 29 3b 0d |TryToCon|nect');.|
|00002010| 0a 09 09 7d 0d 0a 09 7d | 0d 0a 42 65 67 69 6e 3a |...}...}|..Begin:|
|00002020| 0d 0a 0d 0a 09 2f 2f 20 | 57 61 69 74 20 61 20 6d |.....// |Wait a m|
|00002030| 6f 6d 65 6e 74 2c 20 6f | 74 68 65 72 77 69 73 65 |oment, o|therwise|
|00002040| 20 66 6f 72 20 73 6f 6d | 65 20 72 65 61 73 6f 6e | for som|e reason|
|00002050| 20 6e 6f 6e 2d 62 6c 6f | 63 6b 69 6e 67 20 6d 6f | non-blo|cking mo|
|00002060| 64 65 20 6d 61 6c 66 75 | 6e 63 74 69 6f 6e 73 20 |de malfu|nctions |
|00002070| 69 6e 20 73 65 6e 64 0d | 0a 09 44 69 73 61 62 6c |in send.|..Disabl|
|00002080| 65 28 27 54 69 63 6b 27 | 29 3b 0d 0a 09 73 6c 65 |e('Tick'|);...sle|
|00002090| 65 70 28 31 29 3b 0d 0a | 0d 0a 09 49 6e 66 6f 4e |ep(1);..|...InfoN|
|000020a0| 75 6d 3d 30 3b 0d 0a 09 | 50 6c 61 79 65 72 4e 75 |um=0;...|PlayerNu|
|000020b0| 6d 3d 30 3b 0d 0a 09 4d | 61 6b 65 50 6c 61 79 65 |m=0;...M|akePlaye|
|000020c0| 72 53 74 72 69 6e 67 3d | 74 72 75 65 3b 0d 0a 09 |rString=|true;...|
|000020d0| 4d 61 6b 65 49 6e 66 6f | 72 6d 61 74 69 6f 6e 53 |MakeInfo|rmationS|
|000020e0| 74 72 69 6e 67 28 29 3b | 0d 0a 09 47 65 74 50 6c |tring();|...GetPl|
|000020f0| 61 79 65 72 52 65 66 65 | 72 65 6e 63 65 73 28 29 |ayerRefe|rences()|
|00002100| 3b 0d 0a 0d 0a 09 2f 2f | 6c 6f 67 28 22 53 65 6e |;.....//|log("Sen|
|00002110| 64 69 6e 67 20 64 61 74 | 61 2e 22 29 3b 0d 0a 09 |ding dat|a.");...|
|00002120| 45 6e 61 62 6c 65 28 27 | 54 69 63 6b 27 29 3b 0d |Enable('|Tick');.|
|00002130| 0a 7d 0d 0a 0d 0a 00 | |.}..... | |
+--------+-------------------------+-------------------------+--------+--------+
